This forum is closed to new posts and
responses. Individual names altered for privacy purposes. The information contained in this website is provided for informational purposes only and should not be construed as a forum for customer support requests. Any customer support requests should be directed to the official HCL customer support channels below:
For instance, try the following code, underneath a button, on a document that has a field called design_system_changes:
Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim doc As NotesDocument
Dim domSession As New NotesSession
Set uidoc = workspace.CurrentDocument
Dim doc As NotesDocument
Dim rtitem As Variant
'.set value of doc...
Set doc = uidoc.Document
Set rtitem = doc.GetFirstItem( "design_system_changes" )
Call rtitem.AddNewLine( 1 )
Call rtitem.AppendText _
( "Book is 64 pages, full color." )
Call doc.Save( False, True )
End Sub
Expected result: design_system_changes is set with the words
Book is 64 pages, full color.
Actual Result:
Nothing.
Feedback number WEBB86JEJY created by ~Evelyn Cisnither on 06/18/2010